use crate::cdotc_sub;
use common::complex::complex::Complex;

/*
cblas_cdotc_sub
Calculates the dot product of the complex conjugate of a single-precision complex vector with a second single-precision complex vector.

https://developer.apple.com/documentation/accelerate/1513306-cblas_cdotc_sub?changes=__5&language=objc

Parameters
N
Number of elements in vectors X and Y.

X
Vector X.

incX
Stride within X. For example, if incX is 7, every 7th element is used.

Y
Vector Y.

incY
Stride within Y. For example, if incY is 7, every 7th element is used.

dotc
The result vector.

Discussion
Computes conjg(X) * Y.

*/


pub fn cblas_cdotc_sub(
    N: i32,
    X: &Vec<Complex>,
    incX: i32,
    Y: &Vec<Complex>,
    incY: i32,

) -> Complex {
    const CONJ_SIGN: f64 = 1.0;
    cdotc_sub::cblas_cdotc(N, X, incX, Y, incY, CONJ_SIGN)
}